﻿Public Class StateProjectFormFinalized
    Inherits ProjectStateForm

    Public Sub New(ByRef form As ProjectForm)
        MyBase.New(form)
    End Sub

    Public Overrides Sub setForm()
        form.txtProjectName.Enabled = False
        form.rtxtDescription.Enabled = False
        form.dtpStartDate.Enabled = False
        form.dtpEndDate.Enabled = False
        form.txtCreateDate.Enabled = False
        form.cboProjectResponsibility.Enabled = False
        form.txtState.Enabled = False

        form.cboResources.Enabled = False
        form.dtpFromDate.Enabled = False
        form.dtpToDate.Enabled = False
        form.lbAvailableRoles.Enabled = False
        form.cmdAdd.Enabled = False
        form.cmdRemove.Enabled = False
        form.dgvProjectMembers.Enabled = False

        form.cboActivity.Enabled = False
        form.dtpEstimatedStartDate.Enabled = False
        form.dtpEstimatedEndDate.Enabled = False
        form.dtpRealStartDate.Enabled = False
        form.dtpRealEndDate.Enabled = False
        form.cmdAgregar.Enabled = False
        form.cmdQuitar.Enabled = False
        form.dgvActivities.Enabled = False

        form.cmdStartProject.Visible = False
        form.cmdCancelProject.Visible = False
        form.cmdSave.Visible = False
        form.cmdCancel.Visible = True

        'form.cmdStartProject.Visible = False
    End Sub
End Class
